Nuprl Lemma : proddeq_wf
11,40
postcript
pdf
A
,
B
:Type,
a
:EqDecider(
A
),
b
:EqDecider(
B
). proddeq(
a
;
b
)
(
:
A
B
)
(
:
A
B
)
latex
Definitions
x
:
A
.
B
(
x
)
,
EqDecider(
T
)
,
t
T
,
proddeq(
a
;
b
)
,
P
Q
,
x
.
t
(
x
)
,
prop{i:l}
,
P
Q
,
P
Q
,
P
Q
,
x
(
s
)
Lemmas
band
wf
,
pi1
wf
,
bool
wf
,
iff
wf
,
assert
wf
,
pi2
wf
origin
A,B:Type, a:EqDecider(A), b:EqDecider(B). proddeq(a; b) 
(:A 
B)
(:A B)
A,B:Type, a:EqDecider(A), b:EqDecider(B). proddeq(a; b) (:A B)(:A B) x:A. B(x) T
Q
x. t(x)
Q Q Q